home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 February / WPCFEB97.ISO / zarnak / zarnac2.dxr / 00061_rollover - start.ls < prev    next >
Encoding:
Text File  |  1996-12-06  |  465 b   |  24 lines
  1. on exitFrame
  2.   if rollOver(4) then
  3.     set the visible of sprite 3 to 1
  4.     updateStage()
  5.     set flag to 0
  6.     repeat while rollOver(4)
  7.       if the mouseDown then
  8.         set flag to 1
  9.         exit repeat
  10.       end if
  11.     end repeat
  12.     set the visible of sprite 3 to 0
  13.     updateStage()
  14.     if flag then
  15.       set the visible of sprite 3 to 1
  16.       puppetSprite(3, 0)
  17.       go(the frame + 1)
  18.       abort()
  19.     end if
  20.   end if
  21.   updateStage()
  22.   go(the frame)
  23. end
  24.